home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / id007.dxr / 00057.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  887 b   |  25 lines
  1. on exitFrame
  2.   set the locH of sprite 8 to the locH of sprite 8 + random(2)
  3.   set the locH of sprite 8 to the locH of sprite 8 - random(2)
  4.   set the locV of sprite 8 to the locV of sprite 8 + random(2)
  5.   set the locV of sprite 8 to the locV of sprite 8 - random(2)
  6.   set LastTick to the ticks
  7.   repeat while the locH of sprite 4 < 304
  8.     set x to 1 * (the ticks - LastTick)
  9.     set LastTick to the ticks
  10.     set the locH of sprite 4 to the locH of sprite 4 + x
  11.     set the locH of sprite 8 to the locH of sprite 8 + random(2)
  12.     set the locH of sprite 8 to the locH of sprite 8 - random(2)
  13.     set the locV of sprite 8 to the locV of sprite 8 + random(2)
  14.     set the locV of sprite 8 to the locV of sprite 8 - random(2)
  15.     updateStage()
  16.   end repeat
  17. end
  18.  
  19. on mouseUp
  20.   set the visible of sprite 5 to 0
  21.   set the visible of sprite 6 to 0
  22.   set the visible of sprite 7 to 0
  23.   go(81)
  24. end
  25.